Automation use samples

To add one point to new series, follow these steps:

1. Create new series
       dwId = FindGraph.DotsNew( Color,  Shape, Width,  Aspect,  Name)
   See The parameters of series,
   dwId - identifier of a series.
2. Add single point to series with dwId
       FindGraph.DotsAddPoint( dwId,  X,  Y,  Z)
3. Repaint points
       FindGraph.DotsUpdate(dwId)

To add at once some points to new series, follow these steps:

1. Create new series
       dwId = FindGraph.DotsNew( Color,  Shape, Width,  Aspect,  Name)
2. Use variant array. Set the identifier of a series
      FindGraph.ArrayId = dwId
3. Fill array va[3N] of dimension 3N with points (X, Y, Z).
4. Add at once array  to series with dwId
      FindGraph.ArrayVar = va
5. Repaint points
       FindGraph.DotsUpdate(dwId)

To create rectangle area and to select it, follow these steps:

1. Create rectangle area
       dwId = FindGraph.ClipNewRect( Color,  Left, Top, Right, Bottom)
   Left, Top, Right, Bottom - physical coordinates (X, Y) of marks.
2. Select all points in area  dwId
       FindGraph.ClipSelect( dwId,  1)

To get single selected point, follow these steps:

1. Copy selected points (X, Y, Z) and put it on the buffer.
      N = FindGraph.SelectedGetStart( 0)
       N - number of points selected.
2. In cycle we choose points:
   for i=1 to N
   X = SelectedGetX(i)
   Y = SelectedGetY(i)
   Z = SelectedGetZ(i)
   next i
3. Free memory
       FindGraph.SelectedGetStop( 0);

To get whole array of selected points at once, follow these steps:

1. Copy selected points (X, Y, Z) and put it on the buffer.
      N = FindGraph.SelectedGetStart( 0)
       N - number of points selected.
2. Use variant array va. Fill array va[3N] of dimension 3N with points (X, Y, Z).
       va = FindGraph.ArrayVar
       array dimension (UBound(va) + 1) / 3 
3. Free memory
       FindGraph.SelectedGetStop( 0);
   

To display picture and digitize it, follow these steps:

1. Display the background picture.
      FindGraph.DocPictFileName = strFileName
   
2. Create rectangle area with color number 2.
       dwIdArea = FindGraph.ClipNewRect(Color, fLeft, fTop, fRight, fBottom)
   
3. Select area.
       FindGraph.ClipSelect(dwIdArea, 1)
   
4. Digitize points inside rectangle.
       FindGraph.DotsFromPict(Color, Width, "FromPict")
   
5. Free memory
       FindGraph.SelectedGetStop( 0);